(outline-next-preface):

Don't try to move back if already at beginning of buffer.

diff --git a/lisp/textmodes/outline.el b/lisp/textmodes/outline.el
index 80c65a5301b77c7bd2e2336c4ad814fcdb6b2c1e..3debce3e189597edee12a14b9775876c850a3b08 100644 (file)
--- a/lisp/textmodes/outline.el
+++ b/lisp/textmodes/outline.el
@@ -309,7 +309,7 @@ at the end of the buffer."
   (if (re-search-forward (concat "\n\\(" outline-regexp "\\)")
                         nil 'move)
       (goto-char (match-beginning 0)))
-  (if (bolp)
+  (if (and (bolp) (not (bobp)))
       (forward-char -1)))
 
 (defun outline-next-heading ()